Top 10k strings from Contract Bridge (1984)(Highlight Software).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
6 w(p7)=w(p7)+1 3 j(p7,qq)>3 2 x=n(ls,i): 2 s$(t);" ";: 2 qq=h(p8)-10 2 j(p7,l(p7))>5 2 j(p7,bs)>3 2 j(p5,t)+j(p6,t)=0 2 j(p4,ls)=0 2 h(q7)>f(q7)+15 2 f(p8)=f(p7): 2 f(p8)=f(p7) 2 bs=h(p8)-10 2 ;"N-S:";t(1 2 (j(p5,ls)>0 2 "E-W:";t(2 1 z4+e(p7)>hb 1 yt=j(p,t): 1 ys=(n(s,k(s))=p): 1 yq=(n(s,12 1 yn=j(p,s): 1 ym=(n(s,m(s))=p): 1 yk=(n(s,13 1 yj=(n(s,11 1 y=n(x,j+10 1 xx=j(p7,i) 1 x3=l(p7)+i-4 1 x2=j(p7,l(p7)): 1 x2=j(p7,i) 1 w(q7)+w(q8)=0 1 w(p7)+w(p8)>2 1 w(p7)+w(p8)=0 1 vv=hc*(hc>dh)+dh*(dh>hc): 1 vv=dh*(dh>hc)+hc*(hc>dh): 1 v=v+hs*(v=0 1 v=sl*(pm=1 1 v=lo*(ym=0 1 tt=j(p,x): 1 ts=yt+pt-otr: 1 sh=j(p,k)+sp: 1 s=s+i*(j(p,i)>0 1 q9=q9+(n(ls,i)=p4 1 q2=h(p8)-10 1 q(y,x)=q(y,x)+j: 1 q(p7,qq)>1 1 q$="WEST": 1 q$="SOUTH": 1 q$="NORTH": 1 q$="EAST": 1 pt=p(k)+p(k+2 1 pt=j(p4,t): 1 ps=(n(s,k(s))=p4): 1 pn=j(p4,s): 1 pm=(n(s,m(s))=p4): 1 plt=ple+i-4 1 p9=p(p7)+p(p8) 1 p7=d1-s1-1 1 p(y)=p(y)+j: 1 p(x)=p(x)+j(x,j)-4 1 p$(i);" ";: 1 p$(dl+i)="South" 1 p$(dl+i);" "; 1 otr=j(p5,t)+j(p6,t): 1 oo=j(p6,s): 1 no=j(p5,s): 1 n4=n4+(j(p7,i)=1 1 n(t,m(t)-1 1 n(t,m(t))=p6) 1 n(t,m(t))=p) 1 n(s,k(s)-1 1 n(s,k(s))=du 1 n(ls,m(ls)-1 1 n(ls,k(ls)) 1 n(j,i)=n(j,i)+1 1 ln=j(p,j)+j(p4,j): 1 ll=j(p7,l(p7)): 1 k2=k2+(j>2 1 k2=j(k,j)+j(k+2 1 jl=j(p7,l(p7)) 1 j(x,j)=j(x,j)+1 1 j(p7,x3)=j(p7,l(p7)) 1 j(p7,x1)>3 1 j(p7,l(p7))>6 1 j(p7,l(p7))>4 1 j(p7,l(p7))<5 1 j(p7,i)>x2 1 j(p7,bs)>4 1 j(p7,bs)=3 1 j(p7,bs)<3 1 j(p7,b(p7))<4 1 j(p7,a2)>3 1 j(p7,a2)+j(p8,a2)<7 1 j(p6,ls)=0 1 j(p5,ls)>0 1 j(p5,ls)=1 1 j(p5,ls)=0 1 j(p4,ls)>0 1 j(p,s)=j(p,s)-1 1 j(p,k)+sp<sh 1 j(p,j)+j(p4,j)>ln 1 j(i,k)=j(i,k)+1 1 j(du,ls)=0 1 i$="123456789"+ 1 hi=k(ls)-1 1 hc=win-100 1 h(p8)-ho>10 1 g(q)=g(q)+1 1 f(p7)>h(p7)+15 1 f(p7)=f(p7)-b(p7)+x1: 1 f(p7)=f(p7)-b(p7)+t: 1 dn,an;"Re ";: 1 dn,an;"No";: 1 dn,an;"Db ";: 1 d(q8,x3)=0 1 d(q8,l(p7))=0 1 d(q7,x3)=0 1 d(q7,l(p7))=0 1 d(p8,x1)=1 1 d(p8,x1)=0 1 d(p8,b(p7))=1 1 d(p7,x1)=1 1 d(p7,l(p7))=0 1 d$=" and RUBBER" 1 ct=ct+(j(p,i)>0 1 c$=" have made GAME" 1 bl;" below the line"; 1 bb=j(p7,b(p7)): 1 b(x)=b(x)+1 1 al=mm*ot+cc: 1 al=mm*ot+cc 1 a3=a3+a3*(do=1 1 a2=h(p7)-10 1 North EastSouth WestNorth EastSouth 1 HIGHLIGHT SOFTWARECONTRACT BRIDGE 1 ;p$(p);"'s turn:": 1 ;e$;" score ";: 1 ;al;" above the line"; 1 ;"You Me" 1 ;"Winner: ";w$; 1 ;"Round ";rd;":"; 1 ;"Input card values. End each 1 ;"INVALID";: 1 ;"Honour Pts": 1 ;"Highlight Software"; 1 ;"Dealer (1-4)? "; 1 ;"Contract MADE with ";ot;" overtrick";: 1 ;"Contract FAILED by ";ot;" trick";: 1 ;"Computer": 1 ;"Computer" 1 ;"Any key to continue" 1 ;" CONTRACT BRIDGE "; 1 ;" What skill option (1 to 5)? ";: 1 -q(p7,j))) 1 -g(q1))*200 1 +e(p7)>f(p7) 1 +(p(p7)>29 1 +(p(p7)>15 1 +(p(p7)>12 1 *z1+x1>f(p7) 1 *a1+b(p7)+10 1 *(r(plt)=2 1 *(p(p7)>35 1 *(p(p7)>32 1 *(p(p7)>29 1 *(l(p7)+i>4 1 )="South": 1 )="North": 1 )=" East": 1 );s$(r(plt),1 1 )+hi*(ym=1 1 )+hi*(hi<10 1 )+(p(p7)>35 1 )+(n(x1,14 1 (q(p7,j)=0 1 (plt=lead);p$(plt,1 1 (n(t,m(t))=p5 1 (n(ls,m(ls))=p4 1 (n(ls,i)>0 1 (j(p7,qq)>2 1 (j(p7,j)=2 1 (j(p4,t)>0 1 (d(p8,j)=0 1 ((p(p7)-13 1 ((n(ls,m(ls))=p4 1 "Press any key, 1-5 change skill,";: 1 " 0 replays hand, 9 at skill 1." 1 " I am shuffling the cards now ": 1 suit with '0' or 'ENTER'." 1 have made GAME 1 Norman Wells 1984" 1 N D WELLS 1984